home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / comm / misc / oc372DEU.lha / Online_Check37pro / Install < prev    next >
Encoding:
Text File  |  1997-08-30  |  6.2 KB  |  219 lines
  1. ; Installationsskript für ONline_Check 3.72 Professional
  2. ; $VER: ONline_Check Install 3.72 beta Pro (30.8.1997)
  3. ; (c) 1997 A.Teichmann
  4.  
  5. (set version 3)
  6. (set revision 72 pro)
  7. (set @app-name ("ONline_Check %ld.%ld" version revision))
  8.  
  9. (if (= @language "deutsch")
  10.     (
  11.         (set @abort-button "Installation abrechen!")
  12.         (set @error-msg    "Fataler Fehler!")
  13.         (set #welcome (cat
  14.              @app-name
  15.              "-Installation\n\n"
  16.              "Damit wird der ONline_Check automatisch auf\n"
  17.              "Ihrer Festplatte installiert\n\n"
  18.              "ONline_Check © 1997 A.Teichmann@gmx.net\n"))
  19.         (set #version_error
  20.             "\nTut mit leid !\n\nONline_Check benötigt mindestens\nOS 2.04")
  21.         (set #libs
  22.             "libs:")
  23.         (set #s
  24.             "s:")
  25.         (set #Scatalogs
  26.             "locale/deutsch/ONline_Check.catalog")
  27.         (set #Dcatalogs
  28.             "sys:locale/catalogs/deutsch/")
  29.         (set #Dcatalogsf
  30.             "s:online_check.dat")
  31.         (set #Sprefs
  32.             "prefs/deutsch/ONline_Check.pref")
  33.         (set #Sprefsicon
  34.             "prefs/deutsch/ONline_Check.pref.info")
  35.         (set #Starif
  36.             "prefs/deutsch/ONline_Check.dat")
  37.         (set #Scheck
  38.             "bin/ONline_Check")
  39.         (set #Scheckicon
  40.             "bin/ONline_Check.info")
  41.         (set #Sguide
  42.             "docs/deutsch/ONline_Check.guide")
  43.         (set #Sguideicon
  44.             "docs/deutsch/ONline_Check.guide.info")
  45.         (set #Sreg
  46.             "docs/deutsch/ONline_Check.register")
  47.         (set #Sregicon
  48.             "docs/deutsch/ONline_Check.register.info")
  49.         (set #install
  50.             "Installiere ")
  51.         (set #whichdrawer
  52.             "Wo soll für ONline_Check ein Verzeichnis angelegt werden?")
  53.         (set #whichdrawer_help (cat
  54.             "Ein Verzeichnis namens 'ONline_Check' wird dort "
  55.             "erzeugt. Dort wird ONline_Check nach der "
  56.             "Installation zu finden sein."))
  57.         (set #whichdraweru
  58.             "Wo befindet sich ihr Online_Check Hauptprogramm ?")
  59.         (set #whichdrawer_helpu (cat
  60.             "'ONline_Check' wird dort geupdatet."
  61.             "Nach installation wird dort die neueste version zu finden"
  62.             "sein."))
  63.  
  64.         (set #selectparts
  65.             "Bitte wählen sie Zwischen Vollinstallation und UPdate")
  66.         (set #selectparts_help (cat
  67.         "Update bedeutet ,ihr altes Prefsfile bleibt erhalten"
  68.         "und muss gegebenfalls wenn es neue Einträge gibt per"
  69.         "hand an die neue Version angepasst werden."))  
  70.         (set #bye (cat
  71.              "\n\n\nViel Spaß und niedrige Telefonkosten mit\n\n"
  72.              "ONline_Check "version"."revision"\n\n"
  73.              "wünscht Ihnen\n\n"
  74.              "A.Teichmann@gmx.net\n"))
  75. )
  76. )
  77.  
  78. (message #welcome)
  79. (complete 0)
  80.  
  81. (if (< (/ (getversion) 65536) 37)
  82.     (abort #version_error))
  83.  
  84. (set x %01)
  85.  
  86. (if (exists(#Dcatalogsf))
  87.     (set x
  88.         (askoptions
  89.             (prompt #selectparts)
  90.             (help   #selectparts_help)
  91.             (choices
  92.                     "Vollinstallation (überschreibt alte Prefs Files)"
  93.                     "Update           (Nur Hauptprogramm / GUIDE    )"
  94.             (default %10))
  95.         )
  96.     )
  97. )
  98.  
  99.  
  100.  
  101. (if (bitand x %10)(
  102. (set ziel
  103.     (askdir
  104.         (prompt #whichdraweru )
  105.         (default "sys:")
  106.         (help   #whichdrawer_helpu )
  107.     )
  108. )
  109. ;(set @default-dest ziel )
  110. (if (exists(ziel"ONline_Check"))
  111.     (copyfiles
  112.         (prompt (cat "\n\n" #install "ONline_Check Hauptprogramm"))
  113.         (help   #ONline_Check_help)
  114.         (source #Scheck)
  115.         (dest ziel)(confirm "expert"))
  116.         )
  117. (complete 30 )
  118.     (copyfiles
  119.         (prompt (cat "\n\n" #install "ONline_Check Catalogfile"))
  120.         (help   #ONline_Check_help)
  121.         (source #Scatalogs)
  122.         (dest #Dcatalogs)(confirm "expert"))
  123. (complete 60 )
  124. (if (exists(ziel"ONline_Check.guide"))
  125.     (copyfiles
  126.         (prompt (cat "\n\n" #install "ONline_Check Anleitung"))
  127.         (help   #ONline_Check_help)
  128.         (source #Sguide)
  129.         (dest ziel)(confirm "expert"))
  130. (complete 100 ))
  131. )
  132. )
  133.  
  134.  
  135.  
  136. (if (bitand x %01)(
  137. (set ziel
  138.     (askdir
  139.         (prompt #whichdrawer )
  140.         (default "sys:")
  141.         (help   #whichdrawer_help )
  142.     )
  143. )
  144.  
  145.  
  146. (set @default-dest ziel )
  147. (set ziel (tackon ziel "ONline_Check"))
  148. (makedir ziel (infos))
  149.  
  150.     (copyfiles
  151.         (prompt (cat "\n\n" #install "ONline_Check"))
  152.         (help   #ONline_Check_help)
  153.         (source #Scatalogs)
  154.         (dest #Dcatalogs)(confirm "expert"))
  155. (complete 15 )
  156.     (copyfiles
  157.         (prompt (cat "\n\n" #install "ONline_Check"))
  158.         (help   #ONline_Check_help)
  159.         (source #Sprefs)
  160.         (dest ziel)(confirm "expert"))
  161.     (copyfiles
  162.         (prompt (cat "\n\n" #install "ONline_Check"))
  163.         (help   #ONline_Check_help)
  164.         (source #Starif)
  165.         (dest #s)(confirm "expert"))
  166. (complete 30 )
  167.     (copyfiles
  168.         (prompt (cat "\n\n" #install "ONline_Check"))
  169.         (help   #ONline_Check_help)
  170.         (source #Sprefsicon)
  171.         (dest ziel)(confirm "expert"))
  172. (complete 45 )
  173.     (copyfiles
  174.         (prompt (cat "\n\n" #install "ONline_Check"))
  175.         (help   #ONline_Check_help)
  176.         (source #Scheck)
  177.         (dest ziel)(confirm "expert"))
  178. (complete 60 )
  179.     (copyfiles
  180.         (prompt (cat "\n\n" #install "ONline_Check"))
  181.         (help   #ONline_Check_help)
  182.         (source #Scheckicon)
  183.         (dest ziel)(confirm "expert"))
  184. (complete 68 )
  185.     (copyfiles
  186.         (prompt (cat "\n\n" #install "ONline_Check"))
  187.         (help   #ONline_Check_help)
  188.         (source #Sguide)
  189.         (dest ziel)(confirm "expert"))
  190. (complete 85 )
  191.     (copyfiles
  192.         (prompt (cat "\n\n" #install "ONline_Check"))
  193.          (help   #ONline_Check_help)
  194.         (source #Sguideicon)
  195.         (dest ziel)(confirm "expert"))
  196. (complete 95 )
  197.     (copyfiles
  198.         (prompt (cat "\n\n" #install "ONline_Check"))
  199.         (help   #ONline_Check_help)
  200.         (source "libs")
  201.         (all)
  202.         (dest #libs)(confirm "expert"))
  203. (complete 98 )
  204.     (copyfiles
  205.         (prompt (cat "\n\n" #install "ONline_Check"))
  206.         (help   #ONline_Check_help)
  207.         (source #Sreg)
  208.         (dest ziel)(confirm "expert"))
  209. (complete 99 )
  210.     (copyfiles
  211.         (prompt (cat "\n\n" #install "ONline_Check"))
  212.         (help   #ONline_Check_help)
  213.         (source #Sregicon)
  214.         (dest ziel)(confirm "expert"))
  215. (complete 100)
  216. (message #bye )
  217. (exit)
  218. ))
  219.